Pensieve header: $5_2$ for k=1,2,....

SetDirectory["C:\\drorbn\\AcademicPensieve\\Projects\\SL2Portfolio2"];
<< KnotTheory`;
<<"../Profile/Profile.m";
<<"Engine-Speedy.m";
<<"Objects.m";
<<"KT.m";
ℏ=γ=1;
(*BeginProfile[];
PopupWindow[Button["Show Profile Monitor"],Dynamic[PrintProfile[], UpdateInterval->3, TrackedSymbols->{}]]*)

$k=1; Timing@Z@Knot[5,2]

$k=2; Timing@Z@Knot[5,2]

$k=3; Timing@Z@Knot[5,2]

$k=4; Timing@Z@Knot[5,2]

$k=5; Timing@Z@Knot[5,2]